home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 18 / Developer Source Volume 18 (I-MODE Publications, Inc.)(2000).iso / orinf / mar97 / hipsf101.gif < prev    next >
Graphics Interchange Format  |  1998-02-10  |  21.5 KB  |  316x327  |  4-bit (16 colors)
   ocr: DregePlocedere-Sulder; Elle Edit Iools Vindow Help ProgramUnt - SALEINCREASE Compial siply tron Dalete Closo Name SAL_ INCREASE Function Body) FUNCTION sal increase emp. nun nunoer) HETURN number IS dept_ nuR nuper; dept - incr numueri enp. incr number; incr numberi news sal number: sal nunber; - HEGIN select deptno, sal, increase_pet into dept_nun, sal, enp_incr Fron emp uhere empno = emp_nun; select increase_ _pct into dept_incr From dept uhere deptno - dept nURR incr : dept incr a (emp. incr/100)/190; new_sal :S sal + (salwincr); return (new_sal); END; NotModiied SucometupLong - - a Figure ...